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ABSTRACT 

This  paper  is  a  review  of  the  Scheme  programming  language.  Origin  of  Scheme ,  various  features ,  syntax , 
example  code  and  applications  of  Scheme  language  are  discussed  in  this  paper.  The  interpreters  that  are  used  and  other 
dialects  of  LISP  are  also  discussed  in  this  paper.  The  purpose  of  this  paper  is  to  create  an  awareness  of  the  Scheme 
programming  language  to  the  programmers. 
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INTRODUCTION 

The  scheme  is  a  highly  expressive  high  level  language.  It  is  a  dialect  of  LISP  language  and  supports 
multi-paradigm  functional  and  procedural  programming.  It  was  designed  by  Guy  L.  Steele  and  Gerald  Jay 
Sussman  in  1970.  Scheme  was  introduced  as  Sussman  and  Steele  Lambda  Papers.  It  was  the  first  Lisp  dialect 
to  choose  a  static  variable  scope  over  dynamic  variable  scope  and  was  one  of  the  first  programming 
languages  which  supported  first-class  continuations.  The  standardization  of  the  scheme  began  in  2003  and  in 
2006  it  was  standardized  as  R6R5  standard.  R6R5  standard  allows  the  split  between  core  language  and 
libraries. 

FEATURES  OF  SCHEME 

Scheme  as  a  Minimalist  Language 

The  scheme  is  known  as  minimalist  language.  It  has  a  reach  data  set  making  it  extremely  versatile. 
Scheme  programs  are  highly  portable  on  various  platforms.  Dr  Racket  is  the  IDLE  used  for  Scheme  programming. 
It  has  minimal  syntax  like  all  other  Lisp  dialects.  Its  fully  nested  and  parenthesized  notation  rules  out  the  operator 
precedence.  The  new  syntactic  constructs  can  be  added  to  the  language  by  using  Scheme’s  powerful  macro  system. 
The  lexical  scoping  avoids  the  risk  of  common  programming  error  that  can  occur  in  macro  systems  of  other 
programming  languages.  User  can  create  non-local  constructs  using  call-with-current-continuation  that  must  be 
built  into  other  languages  like  backtracking,  iterators  etc. 

The  scheme  was  one  of  the  first  programming  languages  that  used  first  class  procedures  as  in  lambda 
calculus.  Thus,  incorporating  the  block  structure  and  static  scope  rules  in  a 
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•  DrRacket  IDE 


O  Untitled  -  DrRacket*  —  □  X  | 

File  Edit  View  Language  Racket  Insert  Tabs  Help 

Untitled  »  (define ._)  »  +m  P*  Debug^WI  Macro  Stepper  8VI  Run  Stop  |  I 

#lang  scheme 


Welcome  to  DrRacket.  version  7.1  [3m] 

Language:  No  language  chosen ;  memory  limit:  128  MB. 

DrRacket  cannot  process  programs  until  you  choose  a  programming  language. 

Ether  select  the  "Choose  Language,  "item  in  the  "Language"  menu,  or  get  guidance. 


Determine  language  from  source  ▼ 


© 

2:0  384.08  Ml  £  • 


Figure  1:  Dr  Racket  IDE 


•  Comments 

The  short  comments  on  a  line  in  Scheme  start  with  a  semicolon  (;) 


tj)  first.rkt  -  DrRacket* 

- 

X 

□ 

File  Edit  View  Language  Racket 

Insert  Tabs  Help 

first.rkt w  (define ...)  w  ■►PI 

Pf  Debug  IjPUl  Macro  Stepper 

■ 

& 

X 

i 

#lang  scheme 

;This  is  a  comment  line 
(let  ((x  2)) 

(+  x  3)) 

V  1 

V 

Welcome  to  Dr  Racket,  version  7.1  [3m]. 

Language:  scheme,  with  debugging;  memory  limit:  128  MB. 

5 

>1 

u 

Determine  language  from  source  *  4:2  468.24  Ml  • n 


Figure  2:  Code  Example,  with  Comment  Line 


Two  semicolons  (;;)  are  used  in  a  comment  within  a  function  on  its  own  line  and  three  semicolons  (;;;)  are  used  global  or 
introductory  comments,  outside  a  function  definition. 


A  #;  in  Dr  Racket  will  treat  the  entire  code  followed  by  it  as  a  comment,  as  in  Figure  2 


Figure  3:Comment  with  #;  in  Scheme 

For  extended  comments  in  Scheme  we  use  #1  and  I#  as  in  Figure  3. 
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O  first.rkt  -  DrRacket*  —  □  X 

File  Edit  View  Language  Racket  Insert  Tabs  Help 

first.rkt'*'  (define...)*  ■MB  DebugtKMI  Macro  Stepper  Run  ^  Stop  B 

#lang  scheme 
# I  This  is  an 
extended  comment 
of  three  lines  I # 

(let  ((x  2)) 

(+  x  3)) 


Welcome  to  DrRacket.  version  7.1  [3m]. 

Language:  scheme,  with  debugging;  memory  limit:  128  MB. 

5 

> 

Q 

Determine  language  from  source  *  4:2  510.25  Ml  $  • 

Figure  4:  Multi  Line  Comments  in  Scheme 


•  Variables 


The  scheme  has  both  local  as  well  as  global  variables.  A  variable  is  a  name  bound  to  some  data  objects  using  a 
pointer.  The  scheme  does  not  have  any  type  declarations  for  variables.  Variables  are  bound  using  the  special  form  to 
define. 


(define  symbol(variable)  expression) 

define  binds  the  symbol  to  the  result  of  evaluating  expression.  The  following  line  declares  a  variable  called  ‘a’ 
and  makes  refer  to  10. 

(define  a  10) 

a  =>10 

(define  a  20)  ;this  rebinds  a  to  20 
(+  a  2)  =>22 
(define  1  ‘(a  b  c)) 

(define  p  ‘(a  b  c)) 

Here  both  1  and  p  are  pointers,  both  pointing  at  the  same  list. 

•  Lexically  Scoped  Variables  with  Let  and  Let* 

Scheme  uses  special  form  let  to  declare  and  bind  local  variables. 

For  example: 

(let  ((variable  1  value  1) 

(variable2  value2) 


(variableN  valueN)) 

For  example, 

;;  the  efficient  code  to  reverse  the  list  and  double  it 
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(define  rl  x) 

(let  ((r  (reverse  x))) 

(append  r  r))) 

Note:  The  problem  with  bindings  created  with  let  is  that  expressions  cannot  refer  to  bindings  that  have  been  made 
previously.  For  example,  in  the  following  code  x  is  not  known  outside  the  body. 

(let  ((x  5) 

(y  (+  x  l))) 

(+  x  y)) 

Ijl  first.rkt  -  DrRacket*  —  □  X 

File  Edit  View  Language  Racket  Insert  Tabs  Help 


firstrkt  ▼  (define ...)  ▼  *0  P*  Debugs  Macro  Stepper  #VH  Run  ^  Stop  | 


#lang  scheme 

\  - 

(let  ((x  5) 

(y  (+  |  1))) 

(+  x  y)) 

Welcome  to  DrRacket.  version  7.1  [3m], 

Language:  scheme,  with  debugging;  memory  limit:  128  MB. 

x:  unbound  identifier  in:  x 

first.rkt: 5: 14:  x:  unbound  identifier  in:  x 

Jump  to  Error  Q 

Determine  language  from  source  ▼ 

5:14 

557.87  Ml  #  • 

Figure  5:  Scheme  Program  Using  Let 


•  Functions 

a.  Anonymous  Function:  Lambda 

Scheme  uses  special  form  lambda  to  create  anonymous  functions.  See  the  following  example: 

(lambda  (paraml  param2..  paramk);list  of  formals 
expr)  ;body 

lambda  expression  evaluates  to  an  anonymous  function.  When  we  execute  lambda  function,  it  takes  k  arguments 
and  returns  the  results  of  devaluating  expr.  The  parameters  are  lexically  scoped  and  can  only  be  used  in  expr. 

For  example: 

(lambda  (xl  x2) 

(*  (-  xl  x2)  (-  (xl  x2))) 

The  result  of  lambda  expression  can  be  directly  applied  by  providing  arguments,  as  in  following  example, 
((lambda  (xl  x2) 

(  *  (-  xl  x2)  (-  xl  x2))) 

(2-5)  ;  evaluates  to  49 
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b.  Named  Functions  in  Scheme 

l)You  can  bind  the  result  of  a  lambda  to  a  variable  using  define(first  class  functions). 
For  example: 

(define  sq-plus 
(lambda  (xl  x2) 


(*  (+  xl  x2)  (+  xl  x2)))) 


Scheme  provides  a  special  shortcut  version  of  define  that  does  not  use  lambda  explicitly. 

(define  (functionOname  paraml  param2..  paramk) 

expr) 


Ijl  firstrkt  -  DrRacket* 

□ 

X 

-  File  Edit  View  Language  Racket  Insert  Tabs 
firstrkt  ▼  (define  ...)  ▼  “►PI  04? 

Help 

Debug  Macro  Stepper  Run  ^  StopU 

#lang  scheme 

\ 

(define-  (sqrdt) 

(*  x  X)) 

X 

(sqr  4) 

V 

Welcome  to  DrRacket,  version  7.1  [3m], 

Language:  scheme,  with  debugging;  memory  limit:  128  MB. 

16 

> 

© 

Determine  language  from  source  ▼ 

4:2  659.25  Mil 

*• 

Figure  6:  Has  Some  Examples  of  Define 


firstrkt  -  DrRacket*  —  □  X 

File  Edit  View  Language  Racket  Insert  Tabs  Help 

firstrkt  ▼  (define...)’’''  Debug  »t>||  Macro  Stepper  Run  Stop  | 

#lang  3cheme _ _ _ 

(define  (crent- tp  -fahren  dyh  bound  occurrence! 

(+  JX1.8  c)  32.0)  ) - 

( cent-to^f ahren  130.0) 


Welcome  to  DrRacket,  version  7.1  [3m]. 

Language:  scheme,  with  debugging;  memory  limit:  128  MB. 

266.0 


Determine  language  from  source  ▼ 


4:2 


Q 

638.09  Ml 


Figure  7:  Using  Define  without  Lambda  Function 

The  scope  of  x  in  sqr  function  is  only  within  the  function  sqr.  Functions  can  have  zero(0)  arguments  as  follows, 
(define  (fn)  5) 

(fn)  =>  5 

•  Lists 

The  most  important  built  in  data  type  in  Scheme.  Lists  are  unbounded,  heterogeneous  collections  of  data. 
Examples  of  list, 
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(x) 

(scheme  program) 

(246  8  10) 

(2  4  x  y  3.4  “language”) 

0 

List  Representation 


Note  : 

•  (x)  is  not  same  as  x 

•  ()  is  the  empty  list 

•  List  of  lists:  ((a  b)  (c  d)) 

Data  Types 

Following  is  the  list  of  primitive  data  types  in  Scheme: 

•  Numbers 

•  Integers(e.g.l,  7, -5) 

•  Real  numbers(e.g.  3.2,8.6,2.32E10) 

•  Rational  numbers(e.g.  4/3, 5/2) 

•  Symbols  (e.g.  x,al,s!,abc) 

•  Boolean  :  Scheme  has  special  Boolean  symbols  #f  and  #t  to  represent  false  and  true  respectively 

•  Srtings  (e.g.  “hello”, ’’world”) 

•  Characters(e.g.  #\c) 

Equality 

The  three  primitives  in  Scheme  for  equality  and  identity  testing  are: 

•  eq?  -  used  for  pointer  comparison.  It  returns  #t  iff  its  arguments  refer  to  the  same  objects  in  memory.  Two 
variables  that  refer  to  the  same  object  are  eq. 

•  eqv?  -  is  like  eq?,  but  differs  only  for  the  number  and  character  data  types  from  eq? 

•  equal?  -  it  returns  #t  iff  arguments  are  eqv.  It  also  returns  #t  if  its  arguments  are  lists  with  corresponding  elements 
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equal. 

•  eq  is  also  called  as  identity  comparison  and  equal  is  called  as  equality  comparison. 

Control  Structures 

if  special  form: 

if  does  not  automatically  evaluate  all  of  its  arguments. 

(if  condition  true_expression  false_expression) 

If  the  condition  is  true,  then  true_expression  is  returned  alse  false_expression  is  returned. 

firstrkt  -  DrRacket*  —  □  X 

File  Edit  View  Language  Racket  Insert  Tabs  Help 

firstrkt  ▼  (define  ...)  ▼  04  Debug**!  Macro  Stepper  Run  Stop  | 

#lang  scheme  1 

;  if  special  form 

(if  (=  5  (+  2  3))  10  20) 


Welcome  to  DrRacket,  version  7.1  [3m], 

Language:  scheme,  with  debugging;  memory  limit:  128  MB. 

10 

> 

© 

Determine  language  from  source  ▼  4:2  607.96  Ml  • 

Figure  8:  If  Special  form  in  Scheme 

The  condition  in  Figure  7  evaluates  to  true,  hence  true  expression  i.e.  10  is  returned. 


firstrkt  -  DrRacket*  —  □  X 

File  Edit  View  Language  Racket  Insert  Tabs  Help 

firstrkt  ▼  (define  ...)▼  P4  Debug**!  Macro  Stepper  Run  ^  Stop  | 


#lang  scheme 


;  if  special  form 

(if  (=  0  1)  (/I  0)  (+2  3)) 


Welcome  to  DrRacket,  version  7.1  [3m], 

Language:  scheme,  with  debugging;  memory  limit:  128  MB. 

5 

>1 


Determine  language  from  source  ▼ 


© 


Figure  9:  If  Condition  Evaluating  False 

The  condition  in  Figure  8  evaluates  to  false,  hence  false  expression  i.e.  (+  2  3)  =>  5  is  returned 

cond 

the  general  form  of  cond  special  form: 

(cond  (testl  exprl) 

(test2  expr2) 


(else  exprn)) 

As  soon  as  the  test  evaluates  to  true,  the  corresponding  expr  is  evaluated  and  its  value  is  returned.  If  none  of  the 
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tests  evaluates  to  true  then  the  else  part  is  evaluated(exprn). 

•  Loops 

•  while  loop  -  is  very  simple  and  roughly  analogous  to  while  loop  in  C. 

•  do  loop  -  this  is  a  powerful  looping  construct  in  Scheme.  It  is  roughly  analogous  to  for  loop  in  C. 

•  map  loop  -  map  loop  iterate  over  a  list(array). 


O  Untitled  -  DrRacket*  —  □  X 

File  Edit  View  Language  Racket  Insert  Tabs  Help 

Untitled  ▼  (define  ...)  ▼  P*  Debug  Macro  Stepper  #vi  Run  l/  StopU 

#lang  racket  1 

(map  sqrt  (list  14  9  16) ) 


Welcome  to  DrRacket.  version  7.1  [3m]. 

Language:  racket,  with  debugging;  memory  limit:  128  MB. 

'(1  2  3  4) 

> 

Determine  language  from  source  ▼  4:2  415.36  Ml  $  • 

Figure  10:  Map  Loop  Example 

•  Input/Output 

Read-line  procedure  reads  one  line  that  user  types  and  returns  it  as  a  string,  display  is  used  to  display  the  output. 
Refer  Figure  10  for  input/output  in  Scheme 


fjl  Untitled  -  DrRacket*  —  □  X 

File  Edit  View  Language  Racket  Insert  Tabs  Help 

Untitled  ▼  (define  ...)  w  *0  £»#  D*ug®WI  Macro  Stepper  $  VI  Run  V  Stop  | 

#lang  scheme 

(display  "Please  enter  your  name:  ") 

(define  name  (read-line)) 

(display  "Hello,  ") 

(display  name) 

(newline) 


Language:  scheme,  with  debugging;  memory  limit:  128  MB 

Please  enter  your  name:  Lilly 
Hello,  Lilly 

>1 

Determine  language  from  source  ▼ 


Figure  11:  Illustrating  the  Input/Output  in  Scheme 

IMPLEMENTATION  OF  SCHEME 

The  scheme  is  typically  used  to  analyse  and  optimize  application  based  compilers,  to  write  text  editing  programs, 
to  write  drivers  for  graphic  cards,  to  develop  operating  systems  and  much  more.  It  can  also  be  used  to  develop  commercial 
applications  that  are  numerically  based,  to  calculate  large  finance  based  applications,  to  analyse  financial  resources  and 
much  more.  The  scheme  is  also  being  used  for  the  development  of  Virtual  Reality. 

PERFORMANCE  AND  EFFICIENCY 

The  recent  compilers  of  the  Scheme  are  extremely  efficient  and  fast.  These  programs  run  at  par  with  programs 
written  in  low-level  languages  (almost  near  to  assembly  code).  The  scheme  code  implementations  are  extremely  fast  for 
example  Chez  scheme  code.  Though  it  is  fast,  optimizing  the  Scheme  code  is  not  easy.  Writing  a  compiler  code  in  c  is 
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more  easy  than  writing  a  compiler  code  in  Scheme.  The  scheme  is  complicated  because  of  higher  order  functions,  data 
flow  and  type  checking  etc. 
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